Amiga Format CD 52/Amiga Format AFCD52 (Issue 136, May 2000).iso/-screenplay-/shareware/warpquake/warpquakesrc/in_amiga.c

C/C++ Source or Header | 2000-02-29 | 4KB | 200 lines

/*
Copyright (C) 1996-1997 Id Software, Inc.

This program is free software; you can redistribute it and/or
modify it under the terms of the GNU General Public License
as published by the Free Software Foundation; either version 2
of the License, or (at your option) any later version.

This program is distributed in the hope that it will be useful,
but WITHOUT ANY WARRANTY; without even the implied warranty of
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.

See the GNU General Public License for more details.

You should have received a copy of the GNU General Public License
along with this program; if not, write to the Free Software
Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA  02111-1307, USA.

*/
// in_null.c -- for systems without a mouse

#include <exec/exec.h>
#include <intuition/intuition.h>
#include <libraries/lowlevel.h>
#include <powerup/ppcproto/lowlevel.h>
#include <powerup/ppcproto/exec.h>

#include "quakedef.h"

cvar_t m_filter = {"m_filter", "1"};

qboolean using_mouse = false;
qboolean using_joypad = false;
short int last_mouse[2] = {0, 0};
extern qboolean mousemove;

struct Library *LowLevelBase = NULL;

void IN_MouseMove (usercmd_t *cmd);
void Init_Joypad (void);
void Read_Joypad (void);

void Read_Joypad (void)
{
    ULONG joypos;

    joypos = ReadJoyPort(1);

    if (joypos & JPF_JOY_LEFT)
        Key_Event (K_AUX1, true);
    else
        Key_Event (K_AUX1, false);

    if (joypos & JPF_JOY_RIGHT)
        Key_Event (K_AUX2, true);
    else
        Key_Event (K_AUX2, false);

    if (joypos & JPF_JOY_UP)
        Key_Event (K_AUX3, true);
    else
        Key_Event (K_AUX3, false);

    if (joypos & JPF_JOY_DOWN)
        Key_Event (K_AUX4, true);
    else
        Key_Event (K_AUX4, false);

    if (joypos & JPF_BUTTON_RED)
        Key_Event (K_AUX5, true);
    else
        Key_Event (K_AUX5, false);

    if (joypos & JPF_BUTTON_GREEN)
        Key_Event (K_AUX6, true);
    else
        Key_Event (K_AUX6, false);

    if (joypos & JPF_BUTTON_YELLOW)
        Key_Event (K_AUX7, true);
    else
        Key_Event (K_AUX7, false);

    if (joypos & JPF_BUTTON_BLUE)
        Key_Event (K_AUX8, true);
    else
        Key_Event (K_AUX8, false);

    if (joypos & JPF_BUTTON_PLAY)
        Key_Event (K_AUX9, true);
    else
        Key_Event (K_AUX9, false);

    if (joypos & JPF_BUTTON_FORWARD)
        Key_Event (K_AUX10, true);
    else
        Key_Event (K_AUX10, false);

    if (joypos & JPF_BUTTON_REVERSE)
        Key_Event (K_AUX11 ,true);
    else
        Key_Event (K_AUX11, false);
}

void Init_Joypad (void)
{
    LowLevelBase = OpenLibrary ("lowlevel.library", 0);
    if (LowLevelBase)
    {
        Con_Printf ("Joypad enabled\n");
        using_joypad = true;
    }
    else
        Con_Printf ("Can't open lowlevel.libary\n");
}

void IN_Init (void)
{
  using_mouse = COM_CheckParm ("-mouse");
  if (using_mouse)
    Cvar_RegisterVariable (&m_filter);

    using_joypad = COM_CheckParm ("-joypad");
    if (using_joypad)
        Init_Joypad();
}

void IN_Shutdown (void)
{
    if (LowLevelBase != NULL)
    {
        CloseLibrary (LowLevelBase);
        LowLevelBase = NULL;
    }
}

void IN_Commands (void)
{
    if (using_joypad)
        Read_Joypad();
}

void IN_Move (usercmd_t *cmd)
{
    if (using_mouse)
        IN_MouseMove (cmd);
}

void IN_MouseMove(usercmd_t *cmd)
{
    short int mx, my;
  double mouse_x, mouse_y;
  static int old_mouse_x = 0, old_mouse_y = 0;

    if (mousemove == false)
        return;

    mousemove = false;

    mx = (last_mouse[0] >> 1) << 3;
  my = (last_mouse[1] >> 1) << 3;


  if (m_filter.value) {
    mouse_x = 0.5 * (mx + old_mouse_x);
    mouse_y = 0.5 * (my + old_mouse_y);
  } else {
    mouse_x = (double)mx;
    mouse_y = (double)my;
  }

  mouse_x *= sensitivity.value;
  mouse_y *= sensitivity.value;

  old_mouse_x = mx;
  old_mouse_y = my;

  /* add mouse X/Y movement to cmd */
  if ((in_strafe.state & 1) || (lookstrafe.value && (in_mlook.state & 1)))
    cmd->sidemove += m_side.value * mouse_x;
  else
    cl.viewangles[YAW] -= m_yaw.value * mouse_x;

  if (in_mlook.state & 1)
    V_StopPitchDrift ();

  if ((in_mlook.state & 1) && !(in_strafe.state & 1)) {
    cl.viewangles[PITCH] += m_pitch.value * mouse_y;
    if (cl.viewangles[PITCH] > 80)
      cl.viewangles[PITCH] = 80;
    if (cl.viewangles[PITCH] < -70)
      cl.viewangles[PITCH] = -70;
  } else {
    if ((in_strafe.state & 1) && noclip_anglehack)
      cmd->upmove -= m_forward.value * mouse_y;
    else
      cmd->forwardmove -= m_forward.value * mouse_y;
  }
}